home *** CD-ROM | disk | FTP | other *** search
/ EnigmA Amiga Run 1997 February / EnigmA AMIGA RUN 15 (1997)(G.R. Edizioni)(IT)[!][issue 1997-02][PLANET CD V].iso / progs / disk / acdplay / arexx / acdpshell.rexx
OS/2 REXX Batch file  |  1996-12-13  |  402b  |  20 lines

  1. /* ACDPShell.rexx 1.0 by Martin Kresse
  2.    Use this to test the arexx port of ACDPlay */
  3.  
  4. address "ACDPLAY"
  5. options prompt "Command> "
  6.  
  7. Start:  signal on syntax
  8.         signal on error
  9.  
  10.         do forever
  11.             parse pull input
  12.             interpret input
  13.         end
  14.  
  15. syntax: say "Error" rx "in line" sigl":" errortext(rc)
  16.         signal Start
  17.  
  18. error:  say "Returncode: " rc
  19.         signal Start
  20.